Pornodelic/Pornodelic - Disc 2.iso/pc/data/config.dir/00026_set gBGM.ls

Text File | 1998-03-05 | 340 b | 15 lines

global gsoundmuteflg, gbgm, gmuscount

on mouseUp
  repeat with i = 2 to 5
    set the castNum of sprite i to the number of member "MusButton"
  end repeat
  set the castNum of sprite 4 to the number of member "ChkMus"
  set gbgm to "S3"
  set gmuscount to 3
  if gsoundmuteflg = 0 then
    puppetSound(gbgm)
    updateStage()
  end if
end